From: Andreas Schwab <schwab@suse.de>
Date: Wed, 3 Jul 2002 18:42:23 +0000 (+0000)
Subject: (tramp-handle-ange-ftp): Move interactive spec
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~31888
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=ad3446f0b82fe58f09abbc958d6b6d424acbd1d1;p=emacs.git

(tramp-handle-ange-ftp): Move interactive spec
after doc string.
---

diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index e2f485be518..8917c62ac02 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -2973,11 +2973,11 @@ Falls back to normal file name handler if no tramp file name handler exists."
 
 ;;;###autoload
 (defun tramp-handle-ange-ftp ()
-  (interactive)
   "Turn Ange-FTP off and an Ange-FTP-like filename format.
 Requests suitable for Ange-FTP will be forwarded to Ange-FTP.
 Also see the variables `tramp-ftp-method', `tramp-default-method',
 and `tramp-default-method-alist'."
+  (interactive)
   (let ((a1 (rassq 'ange-ftp-hook-function file-name-handler-alist))
 	(a2 (rassq 'ange-ftp-completion-hook-function file-name-handler-alist))
 	(a3 (rassq 'tramp-file-name-handler file-name-handler-alist)))